COMMENT ⊗   VALID 00002 PAGES
C REC  PAGE   DESCRIPTION
C00001 00001
C00002 00002	 triang.lsp[f82,jmc]	How many queens will fit in a triangle
C00042 ENDMK
C⊗;
;;; triang.lsp[f82,jmc]	How many queens will fit in a triangle
(declare (special rank1 pos))

(defun solutions (pos sols)
       (if (terp pos)
	   (if (winp pos) (cons (outform pos) sols) sols)
	   (do ((m (moves pos) (cdr m))
		(s1 sols (solutions (update (car m) pos) s1)))
	       ((null m) s1))))

(defun moveq (pos)
       (cons 0 (do ((i 1 (1+ i))
		    (l nil (if (ok i (ranklist pos))
			       (cons i l)
			       l)))
		   ((= i (1+ (- n (filenum pos)))) l))))

(defun make-pos (u m n) (list u m n))

(defun ranklist (pos) ; a list of the ranks occupied in each file
       (cAr pos))	; 0 means the rank is unoccupied

(defun filenum (pos) ; the number of the first available file
       (cadr pos))

(defun nqueens (pos) ; the number of queens so far placed
       (caddr pos))


(defun ok (r list) (and (or (not (= r 1)) (not (< (filenum pos) rank1)))
			(ok1 r list 1)))

(defun ok1 (r list n)
       (or (null list)
	   (and (ok2 r (car list) n)
		(ok1 r (cdr list) (1+ n)))))

(defun ok2 (r r1 delta) (or (zerop r1) (not (or (= r r1)
						(= r (+ r1 delta))
						(= r (- r1 delta)) ))))

(defun terp (pos) (= n (filenum pos)))

(defun winp (pos) (not (< (nqueens pos) nwin)))

(defun update (m pos) (progn (if (null (ranklist pos)) (setq rank1 m))
			     (make-pos (cons m (ranklist pos))
				       (1+ (filenum pos))
				       (if (= m 0)
					   (nqueens pos)
					   (1+ (nqueens pos))))))

(defun outform (pos) (list (reverse (ranklist pos)) (nqueens pos)))

(setq rank1 0) ; used to avoid generating some symmetric solutions

(setq init-pos (make-pos nil 0 0))

(setq base (setq ibase 10.))

(defun test (m0 n0) (progn (setq n m0) (setq nwin n0)
			   (solutions init-pos nil)))

;bfun

;(untrace)
;(setq n 5)
;(setq nwin 4)
;(trace ok solutions moves update)
;(solutions (make-pos nil 0 0) nil)
;efun
;end
(test 3 2)
(((2. 0. 1.) 2.)) 
(test 4 2)
(((2. 0. 1. 0.) 2.) ((2. 0. 0. 1.) 2.) ((3. 0. 2. 0.) 2.) ((3. 0. 0. 1.) 
2.) ((4. 2. 0. 0.) 2.) ((0. 2. 0. 1.) 2.) ((0. 3. 1. 0.) 2.)) 
(test 5 3)
(((2. 4. 1. 0. 0.) 3.) ((2. 4. 0. 1. 0.) 3.) ((2. 0. 3. 1. 0.) 3.) ((3. 
0. 2. 0. 1.) 3.) ((4. 2. 0. 0. 1.) 3.)) 
(test 6 4)
(((2. 4. 1. 3. 0. 0.) 4.) ((2. 5. 3. 1. 0. 0.) 4.) ((3. 5. 2. 0. 1. 0.) 
4.) ((4. 2. 0. 3. 1. 0.) 4.)) 
(test 7 5)
(((3. 5. 2. 4. 1. 0. 0.) 5.) ((4. 2. 5. 3. 1. 0. 0.) 5.)) 
(test 8 6)
NIL 
(test 9 6)
(((2. 4. 6. 3. 5. 0. 1. 0. 0.) 6.) ((2. 5. 3. 6. 4. 0. 1. 0. 0.) 6.) ((2. 
5. 7. 4. 1. 3. 0. 0. 0.) 6.) ((2. 7. 5. 3. 1. 4. 0. 0. 0.) 6.) ((3. 5. 
7. 1. 4. 2. 0. 0. 0.) 6.) ((3. 5. 7. 2. 4. 0. 1. 0. 0.) 6.) ((3. 5. 7. 
4. 1. 0. 2. 0. 0.) 6.) ((3. 6. 2. 5. 1. 4. 0. 0. 0.) 6.) ((3. 6. 4. 1. 
5. 0. 2. 0. 0.) 6.) ((3. 6. 4. 2. 5. 0. 0. 1. 0.) 6.) ((3. 7. 4. 1. 5. 
2. 0. 0. 0.) 6.) ((3. 7. 4. 2. 5. 0. 1. 0. 0.) 6.) ((4. 2. 7. 5. 3. 1. 
0. 0. 0.) 6.) ((4. 6. 3. 5. 2. 0. 0. 0. 1.) 6.) ((4. 6. 3. 5. 0. 1. 0. 
2. 0.) 6.) ((4. 7. 3. 6. 2.0. 1∞ 0. 0.) 6.)  (4, 7.j\@d8@`\@D\@f\`\@~(`\R@XXR@P h\@n8@j\@L\@b\`\@`8@d\@@\R@8R@@!C!!↓ap↓M9*q↓I9β↓9↓Ep∧βαrε¬bJQ&brJ¬¬β"rπ↓bβ*dε2rβ∃`βαrε!bβαdεαbJεebJαα

%dK@⊂
↔⊂≠↔λ→S⊂_⊂_↔Tε 0.) 6.	 	
λλ5* $8@h\@X\@`\fT@α8@`L@@XR@l8R@@!C)1↓Ip∧β"r∧5bβαdεBrβ∃`λε¬HE∀
KB$¬λ∧αWλ∧A→Wλ≠↔⊂~⊂→↔ 0. 0. 0& 1,) &.)  ⊂PT\@f\h\@H8@`L@DX@`\α↓I9↓αq%↓YpI↓!*q↓M9h)Y9β↓9↓Ip∧β"rε⊃bβαdεαrJεebJαα

%d
k@⊂↔⊂~. 0. 1. 3. 0. 0.) 6.) ( ¬. 7. 2. 
6. 3. 1(@`8@`\@@XR@l8R@@!C19↓Mp↓U)↓⊂q↓Q→β↓9↓Ar↓A9↓λq%↓YpI↓!2q↓M9β99↓Ip4)Qr↓A9↓λ¬bβαdεαrJεebJαα

Ed
@ε%H
+DεkH¬dHε¬H+E∀
KJ$¬λ
KDεHEdHεUHβ"F5H+DεH¬e(
KE∃(β"E∞→<⎇∧ε,λ
e⊃"Jα¬εH
edkHεeHKDε+H%dHε¬HE∀
kB$¬
↓DεkH
%dK@εeH+DεkH¬dHε¬J(β!&kJ(¬¬
+HεuHKDεH
Ed+Hε5HDεH¬e(
kE∀


%d
kHε%H
KDεkH%d
Hε¬HDεJ(↓QMkJ$¬

KDεHEd
kHεUHkDε+H¬dHε¬J(
ee*(β!%≥→<nD,(π¬#"SI→λβ"E∞→<⎇∧ε,H∞¬⊃"J≤l↑≤(→M⎇h	j¬¬KHεUH
kDπ+Hed
KHεEH+DεH¬dHε¬J(∞¬e(

ε%H
+DεkH∞%d
HεeH+DεkHβ!&H¬dHε¬J(∞¬e(

ε%H
+DπH
¬d
kHε5H
KDεH%dHε¬HE∀∞J$¬
KDεKH∞%dβ"Med
Hε∃HkDε+H¬dHε¬HE∀∞J$¬
λKDεkHed
KHπ¬H
+Dε+H
¬dHε¬HDεJ(↓QNJ$¬
λKDεkH
%dkHπ¬H
KDεH¬d+Hε¬HDεJ(π¬J(
¬εKH
ed
+Hπ¬H#DεH
EdkH↓QLHε¬HDεJ(π¬J(
¬εKH∞%d
K@ε5H	kDεH%d
+Hε¬HDεH¬E(∞βE∀λ
ED∞+HεeHβ"FEH
cDε+Hed
+@ε¬HDε	H¬E(∞βE∀λ
ed
+HεuH∞+DεH
Ed+@ε¬HCDεH¬dB$↓"NE∀λ
∧ed
K@π¬Hλ#DεH
ed
+@⊂↔⊂_↔λ_↔⊂_⊂_↔∧H≤↔∀P
∀→W⊂
↔⊂∀πλ_W⊂~K⊂≠W 2. ∧∞ 	
0. 0& 0. 0.	 8.) ((3. 6. 9. 2. 5. 7.h\@B8@`L@@\@`\`\R@`XB@P f\@2q↓e9h)U9βA1↓Ep∧β"r∧ DεH¬D@ε¬J(∞¬@⊂P∀∀W⊂β↔λ≤W⊂≠K⊂_W 4. 28@j\@@\@`\`\@`8R@~∀`XB@P f\@,8@b`\j\@λ8@b\@T\@d\`\@`8@`\@@\R@⊂8R@@PL\@n\α↓I9↓@¬bβ2dεBbβ∃`λ↓QM+@ε¬HDε	H¬E(αβE∀λ∧∀	K⊂≠W 4. λ8@j\@H\@l\`\@8@b\@@X@`\αI↓a→J↓!↓Mp∧β*R↓Q#αdεBbβe`β
H↓+DεKH¬D@ε¬HE∀∞B$¬λkDπ	H
¬D
k@⊂U⊂β↔λ→↔⊂~K⊂_↔⊂↔⊂_↔λ∧E_↔
P≤↔∧H∀⊂⊃Wλ≤∪⊂≠⊂~↔U⊂β@. 5. 0, 2.0. 0. 0.) 8.) ((3 ≤@`X@l\α↓Q9↓⊂¬bβ:d↓PS*dεαrβ¬`β
HDε	J(π¬J(
¬εhπ⊂≤⊂≠↔∞W⊂∩∞ 5. 1. 4.`\@`8@`L@@XR@p8R@@!C→94SI9↓Qp∧βBrεUbβ∩dεbrβ∃`λε¬HDεH¬E(∞↔
P⊂∀→K⊂≤W 6. "∞ 5. 7. 1.h\@`8@`\@@\@~∀@XR@P8R@@PL\@r\l\@h8@b\@\\@j\α↓I9↓αq↓A→β↓9↓ApI↓a9J↓!!Mp↓e)2q↓Q→β⊃1↓]p∧hSU`βαr⊃bβαdεαbβ¬a∩βBe∀αBβ5`βJRqbβ∩dεBbβe`β
@H↓+Dε	H¬dHε¬J(∞¬@⊂P∀∀W⊂εE∞Tε n8@j\@H\@l\bP→αq↓Q9β↓9↓Ap↓A9%βA1¬↓BAM)λεαrβE`λεUH
+DεKH
Ed+@⊂↔⊂↔λεE_↔λ_∪∀P∞↔∀P∀
~↔⊂≠⊂→W∞Tε nαq↓U9β⊃1↓Ap↓E 2¬bβαdεαbJ¬E∀λ∧∀

α 6.8. α8@j\@4∀n\@@X@b\α↓M)αq↓A→β↓0∩Jε↔
P⊂λ(PP	↓Yp∧βBr Dεhπ⊂_Kα 3.5(@8@`L@@X@`\αI↓a→J↓!↓Qp∧H∪e`λπ¬HkDε+H
e@⊂~W 2. 0. 0. 0, 0.$@p\RPPh\α↓Q9@¬bβ~dεRrβu`λε%HDε	H¬d+@⊂βE_↔) 8.) ( 4.h\@@¬bβ~dεRbβq`λε¬H_@. 0& 2(∧@`\`\R@`P	¬↓@AQ9↓2q↓a9β→0∩βq`λε¬Hβ"F%H¬+Dε+H¬D@⊂↔∀P≤α ∩@P h\@l8@pL@TX@n≤α↓E25bβαdεαbβ¬`λε%HE∀∞@∀H⊂⊂4∞ 
∧l8@p@9β)1↓\p∧β
↓Hλ↔λ→↔⊂_α 3.0. .) 8.$@@@↓"q↓Y9βI1↓Mp∧β*H≠@. 2. 0) 8.	 (($. 7. 3. 8. 4. 2. 0. 5. 1. 0. 0. 0.) 8.) ((4. 
7. 5. 8.2. 0. 6. 3. 1. 0. 0. 0.) 8.) ((4. 7. 5. 8. 6. 1. 3. 0. 0. 0. 2. 
0&) 8.) ((4. 7. 5. 8. 6. 1. 0. 2. 0. 3. 0. 0.) 8∞)  (4, 7.9. α. 6. 1. 
3. 5. 0. 0. 0. 0.) 8∞)  (4, 7.r\@F8@l\@H\@`\j\@α8@`\@@X@`\$@p\RPPh\~∀n\r\@l8@d\@T\@b\`\@`8@f\@@\@`\$@p\RPPh\n\@r8@l\@L\@b\`\@j8@d\@@\@`\∩∀`\$@p\RPPh\jT@Bβ↓9↓Mp↓Y9↓⊂¬bβ*dεαbβ∃`βαrε¬bβαe∀βBr∀¬αC"dπαbβ5`β*R¬kDε+Hβ!&KH¬dK@⊂↔⊂⊂↔λ_∪∀P∞↔∀P∀
~↔⊂≤⊂→W
U⊂βGλ→↔⊂≠⊂_↔↔⊂Gλ_∪⊂_α) 8∞)  (4( 
8, 3.9(@8@d\@T\@b\α↓A9↓αq↓A9β↓1%↓@¬bJα¬εB@$∞@ε⊗	Hed
K@ε%H
+Dε+H¬d@↓⊃LHε¬J(∞¬@⊂P∀∀
↔⊂≤πλ_X↔
U⊂↓πλ≠↔⊂_K⊂→W⊂↔⊂_↔λ_↔⊂_∀P≤↔
P⊂λ(4, 9.3. ¬. 7. 
λ1. 6. 2.0. 0. 0. 0.) 8∞)  (4, 9. 3. ∃. 7. 2. 6. 0. 1. 0. 0. 0.) 8.) ((4.
1. 3. 6. 2. 7. 5. 1. 0. 0. 0. 0.) 8.) ((4.9. 5. 8. 1. 3. 6. 2∞ 0. 0. 0. 
0.) 8.) ((4. 9. 5. 8. 2. 7.3. 1. 0. 0. 0. 0.) 8.) ((4. 9. 7. 3. 1. 6. 
2. 5. 0. 0. 0. 0.) 8.) ((4. 9. 7. 5. 2. 6. 1. 0. 0. 3. 0. 0.) 8.) ((4. 
9. 7. 5. 3. 1. 6. 0. 0. 2. 0. 0.) 8.) ((4. 10. 7. 5. 3. 1. 6. 0. 2. 0. 
0& 0.) 8.) ((4. 10. 8. 5. 3. 1. 6. 2. 0. 0. 0. 0.) 8.) ((4. 11. 7. 3. 6. 
2. 5. 1.0. 0. 0. 0.) 8.) ((4. 11. 7. 5. 2.6. 1. 3. 0. 0. 0. 0.) 8.) ((5. 
2. 6. 9. 7.4. 1∞ 3. 0. 0. 0. 0.) 8.) ((¬. 2. 9. 6. 3. 7. 4. 1. 0. 0. 0. 
α0.) 8.	 ( *8@d\@d\@l\h\@nαq↓E9β→9↓Ar↓A9↓αq↓A→J↓a9%αA!U9β→9↓Yp↓e 2
cDε+Hβ!&HED@ε¬HDε	J(π¬J(
¬ε+Hed
K@π∃HWλ→↔⊂~⊂_↔Tε . 0. 0,) 8∞)  ⊂PT\@~∀L\@l\rT@8q↓Q9β	1↓Ap∧β∩rε¬bβαdεαrJ¬↓bJαα

%Dk@π¬H	↔λ≠S⊂_Kα 6.d\@`8@`L@@X@~∀@XB@@¬bJαα
¬%Dk@π∃β⊂6. 8& 2, 4.b@→ε¬bβαβH¬@⊂_↔) 8 ≤RP@!Up∧β~R∞+Dεhπ⊂→
ε 4.∩∧l\α↓ErDελπ⊂_
α 0. @p@9J↓!BU`λεP∞ dαq↓Y9βA ∩β⊃`λεEHλ↔λ→P∞ 0,∧@`\α↓A9$βA ∩↓(
∀
Tε 
0ε@9ε@DεIH∞¬⊂→↔ 0. &8@`@9β↓ ∩β⊂@⊂↔∀@≤
α ∩@PαAU2
`↔λ~⊂∞ 6,∧@p\α↓I9αq↓Adε2`$ ↔ 0. 
0.) 8(∧@%↓@¬β*H≠@. 4 ≤@XX@p\α↓A9ε⊂Dεhπ⊂_⊂→π 0.  8R@p\αI↓↓
+Dεhπ⊂≤Kα 3.`	9ε@Dα@
1∞ 0 ≤@@X	↓Ap∧β∩r∧E∀∞@∀λ⊂⊂λj8@n@9βI0∩β5`λπ¬H→. 4 ≤@@X	↓D¬`λε¬H_↔λ_⊂∞) 8.)((5. 
λ∧n@9βI0∩β5`λπ¬H~. 1. 0(∧@d↓p∧βαr∧Dελπ∀P∞↔∀@∀
~W⊂≠α 9∞h\@↓⊂¬bβαβH
E⊂→W 1 @αq↓Ad↓P@&λπ∀P∞↔∀P∀
~W⊂≠α 9.h\@2q↓E9β→1↓Ap∧βαr∧DεIH¬@∀P_8R@@!@εR`$
c@⊂∞Pε hαq↓Y9β	0∩Q&α`$C@⊂↔⊂3. 0 ≤@@X	%βE∀λ∧∀
Kα 7.rP→ε@Dπλπ⊂_Kα 3.`\@↓⊂¬bβαβH¬⊂_↔) 8 ≤RP@!Up∧H∪u`λπ∀β⊂⊗. 3 ≤@DX	↓Pp∧βαr∧Dελπ⊂→⊂_↔( 8&) ( ⊂j\α↓@~H _⊂→Wα. $8@b\@@\@`\α↓I9hQA9↓αq%↓apI↓!¬+DεiHε¬H↓↔λ≠↔⊂_K⊂→W↔⊂↔λ→↔⊂_⊂_↔) 8&) ( 5.4εT@	↓1↓Yp↓M9hQE2¬↔λ_∪⊂_⊂→↔ 0. .) 8.	 ( ⊂↓*q↓]9β↓A9↓2q↓M9β	9↓Ap∧β"r∧ Dε	H¬dB$πJ(¬∧
+@↓QL∧↔ 2. 78@fL@X\@`\bP→ q↓A→β↓9↓ApI↓a9J↓!!Up↓a9↓⊂q↓e9β→9↓Yp↓Q9↓λ¬bβαdεαrβ¬`HS¬e∩βBe∀αBCU`βBr∧!bβJdεbrβ5`β
@H↓βDε	H¬d@ε¬J(∞¬@∀P∀∀
U⊂∧πλ~↔⊂≠K⊂→W⊂
↔⊂εE↔⊂_↔λ_∪⊂_⊂_↔⊂W∀P≤∀P∀∀
W⊂_. 4. 7. 3. 6. 0. 1. 0. 0.2. 0.) 8.) ((%. 
8. 4. 7. 3. 0. 6. 1. 0. 2. 0. 0.) 8.) ((%. 8. 4. 7.0. 2∞ 6. 1. 3. 0. 0. 
0.) 8.) ( ¬. 8. 4. 9. 3. &. 2. 0. 0. 1. 0. 0.) 8.) ((5. 8. 4.rT@N8@f\@4⊂b\@@\@d\`\@`8@`\Rp\R@ Pj\@`\@l\f\@n8@d\@P\@`\`\@`8@`\@D\R@p8R@@PT\@~∀`\@l\f\@n8@d\@@\@`\h\@b8@`\@@\R@p8R@@PT\@p\h\@f8@`\@\\@b\α↓Q9↓⊂q↓A9β↓94S↓1%↓@q%↓↓C)9↓ar↓Q9↓"q↓I9β99↓Ar↓M9↓αq↓A9β	9↓ArI↓a9J↓!!Up↓a9↓2q↓Q9β⊃9↓]p∧hS¬dβαrε5bβ
dεαrβ¬a∩βBe∀αBCUdβBrεebβJdε2rβ∃`λεEHDεHEdHε¬J(∞¬e(

εUHβ"G¬H
KDπ+Hed+@ε¬H
DεKH¬dHε¬J(∞¬E(

εUHαDε,@ε5H↓kDεKH
¬d+@⊂↔⊂_↔λεE_↔λ_↔∀P∞↔∀P∀
~W⊂≤K⊂→↔
↔⊂≤↔λ→W⊂_K⊂~↔ 0. 0. 0. 0.) 8.)  (5. 9.4. 6. 8. 
λ2. 0. 1.3. . 0. 0.) _∞)  (5. 9.4. 6. 8. 3. 1.`\@`8@d\@@\@`\$@p\RP@j\~∀b\l\@f8@n\@PX@b\`\@`8@`\@H\@`\$@p\RPPj\r\@l8@h\@HX@n\f\@8@`\@@\@b\~∀`\$@p\RPPj\r\@l8@h\@\\@b\f\@`8@`\@@\@d\`\R@`\R@P j\@r8@l\@P\@n\b\@~(`\@d8@`\@L\@`\`\R@`\R@P j\@b@\@d\l\@f8@n\@P\@b\`\@`8@`\@@\R@p8R@PPT\@~∀D`\@h8@l\@`\@f\bT@`8@d\@@\@`\`\R@`\R@P j\@B@\@l\h\@d8@n\@L\@`\`\@b8@~∀`8@`\Rp\R@ Pj\@D`\@l8@h\@H\@n\`\@f8@b\@@\@`\`\R@`\R@P j\@B@\@l\r\@d8@~∀h8@b\@L\@`\`\@`8@`\Rp\R@ Pj\@D`\@l8@r\@L\@b\h\@d8@`\@@\@`\`\R@`\R@P j\@~(b`\@`\@h\d\@n8@f\@D\@`\`\@`8@`\Rp\R@ Pj\@DbP→↓"q↓]9β→9↓Yr↓I9↓αq↓E9β↓94S↓9↓ArI↓a9J↓!!Ur↓EE9β19↓Mr↓]9↓∩q↓Q9β↓9↓Ep↓A9↓αq↓A9J↓a9%αA!U9β	E2εebβ~dεrrQ&Brβ∃`λε¬HCDε	H¬dB$πJ(¬∧
+@ε⊗+H
Ed
@⊂
Pε b8@fL@@\@d\α↓A9↓αq↓A→J↓a9%αA!Y9h ∪∩dεRbβ¬`λεEH↓cDεhπ⊂_⊂_↔Pε  . 0&) 8.) ((6. 2,∧@j\α↓a9↓ ¬bβ:dεαbβ5`λε∀β⊂⊂. 0 ≤@4⊂	Ae∀βBr∀¬αC2dε"@$∞+@⊂
Pε pαq↓Q9β	0∩β5`λε¬HDελπ⊂_α) 0αq%↓¬
EdK@⊂X⊂∞ 5, 7\α↓Q9hQErkDελπ⊂_
⊂_↔ 0.)8(∧@%↓@¬β"r∧kDεhπ⊂→
ε 8.j@9ε⊂Dελπ⊂_
α 0.`\@αq%↓ap¬αααα≠↔λ
∀f8@n@9β! 2β¬`λεTπ⊂28@`@9β↓ ∩β¬`λε∀π⊂0.) 8. @@@ εebβ~βH
E@⊂∩.p\@↓*q↓Adεα`$@⊂↔⊂⊂. ~)αq%↓ap¬αααα≠↔λ→P∞ 9,∧@h≤α↓a9εUbβ∩dεα@$ ↔ 0. `8@`@9H↓a9∧αA!Y→β→ ∩β⊃`λε↓P∞ hαq↓Id↓P@&λπ⊂~Kα 1\α↓A9ε¬bβαβJ(π¬H 
¬εKHe⊂≤G 0∞@9εUbβ∩dεα@$λ#@⊂
↔⊂⊂. 0 ≤@@P	¬πE∀λ∧∀6(∧@~∀LP	↓Eαq↓Qdεb`$
+@⊂↔⊂↔λ_W⊂_α 0.`\R`P	J¬
εEH→Wλ_X↔ 0∞@9ε@DεIH
%D@⊂P∞ `8@∀&¬bβαβJ(π¬J 
¬εIHe@⊂_X↔λ≤⊂∞ 5,∧@d↓p∧β"r ↔λ_⊂∞ 0(∧@`\α↓A9$βA ∩↓(
∀
α. hαq↓I9βA ∩βU`λ↓↓A≠G 1 ≤@↓~q↓Adεα@$@⊂↔∀@≤
α ∩@PαAQ9ε@Dεhπ⊂~K⊂≤↔ 2.  8@f@9β↓ ∩β¬`λε∀β⊂0.) 8.$@@@ εeb ¬~πλ≠P∞ 5, 8.d\@αq↓Adε2`$ ↔ 0. `8R@p\αI↓↓
KDε	H
e@⊂~W 8.  8@b\@LX	↓Ap∧β∩r∧Dε@
0.) 8.$@@@ εebβ"βH∞%@⊂~W 8. dαq↓Adε2`$#@⊂↔⊂⊂. 0 ≤Rp\R@ PlL@PX	↓ep∧β4π⊂3. 0 ≤@4⊂	I9β)0∩β⊃`λε¬Hλ↔λ_⊂∞) 8.) ((6. 4(∧@r\α↓P~↓H
Wλ→P∞ 0,∧@`\α↓A9α¬bβ∩dεα`$(≤.)  ⊂Pβ1 ∩Q&B@$,Dεhπ⊂~Kα 2∞`\@↓λ¬bβ~βH¬⊂_↔ 0.! 8(∧@%↓@¬β"r¬↔λ_X↔ 0ε@9αUbβ~βH%@⊂_↔ 0. dαq(αLDελπ∀P∞↔∀P∀
≠↔⊂~
α 10. 8& 3, 5.d\@8@b\@@P@`\α↓A9%βA0∩↓(
αεEH
. 10.p\@
8@∀	~q↓E9β↓0∩β%`λε¬Hλ↔λ_∪∀P∞↔∀P∀
≠↔⊂≤⊂→W 5(@8q↓I9β!1↓Ap↓A9αq↓A→β	0∩
εβE∀λ∧∀⊂εE≤⊂→W 5(@↓8q↓I9β↓1↓Ap∧β"r⊂Dελπ⊂_∀P_8R@@!A11↓ap∧β~@H≠@. 4& 2(∧@j\`\@8@`@9β↓14S	 ∩Jε↔
P⊂λ(⊗, 8.fT@↓8q↓Q→β⊃1↓Ap↓U)α¬bβαdε∩`$@∀λ≤⊂∞) ( 6.p\@f8@nL@PX@`\α$)Ep∧β*@H_↔λ→↔⊂_⊂_↔) 8&) ( 6.p\@F8@nL@@X@d≤α↓U 2 ↔λ~∪⊂_⊂_↔↔∀P≤
α! (λ6. 
8. ¬. 2. 4, 7.`\@ε8@`L@@X@b≤α↓A9%βA0∩
¬↓β2r∞↔λ~W⊂→⊂~↔ 4εT@αq↓A→β→0∩β⊃`λε¬Hβ"F¬J(∞¬⊂P∀∧
↔⊂_8@j\@HX@`\h
	αAbβ
dε2bβ¬`βαr¬bJβ¬`
$¬λ∧⊗. 9. 2,∧@h\α↓a9↓~q(&Ubβαdε∩bβ¬`λε¬HλE∀∞@∀H∀⊂λl8@r\@HX@j\α↓P~H
. 1. 0, 0.fP→ε¬bβαe∀βBr∀¬αC2d↓PCJdε"bβ¬`λεUβ⊂3. 1. 0,∧@h≤α↓A9↓α¬bβαβJ(π¬J(
¬εKH∞%@⊂→W 5 @↓8¬bβ"βH%@⊂_↔ 0. . 2. 
λ∧`@9J↓a9%αA!Y9βI0∩β5`λεTβ⊂88@h@9β	0∩β¬`λε¬H	. 0 ≤@@X	%πE∀λ∧∀6,∧@r\α↓M2∞↔λ~⊂∞ 2(∧@~∀@P	↓Up∧β
H_↔λ_⊂∞ 0,∧B@↓@¬bJαα
≠
α 9∞j@→ε Dελπ⊂≠Kα 3.`\@αq↓Adεα`$@∀λ≤⊂∞) ( ⊂L\α (∩α ↔ 5 @↓⊂¬bβBβHe@⊂_↔ 4. bαq↓Adεα`$@∀λ≤⊂∞) ( ⊂L\α↓e2
`↔λ→↔⊂≤
α 3.b@9ε@Dελπ⊂_⊂_↔ λ
∧`\αI↓a→J↓!Ce`λε⊗λπ⊂→
α 5.p\@↓ ¬bβ
dε2bβ¬`λε¬H_↔λ_⊂∞) 8.) ((6. 00. dαq↓]→β)0∩β5`λ↓↓A_W 0. hαq↓Adεα`$@∀H≤⊂∞) ( 6.0. j8@b\@@P	↓Ap∧βαr∀πα@$∧P∀(5 @~q↓adεb@$C@⊂↔⊂εE
Pε bαq↓Q→β↓ ∩β¬`λε¬J ∞¬@⊂	 ( j@→ε@DεKH
%D∞@⊂α. &8@`@9β↓ ∩β⊃`λε¬HE∀∞@∀H⊂⊂λn8@α∧h8@d\@TX	↓ap∧β %HλDεiH%@⊂_↔ 0. .) 8.$@@@ εqbβ"βHE⊂≤W 4. β. 5. 0, 1∞`\@8@∀&¬bJβ¬`
$∧λ≠Wλ~∪⊂≠⊂≤↔ 2. %. 3 ≤@@X	↓Ap∧βαr¬bβ
e∀βBr∀¬αC:dεBbβe`λπ¬H→. 5. 
λ∧`@9β↓0∩β⊃`λε5β⊂0. 0 ≤Rp\R@ PnL@PP	↓Yp∧βJH→. 5. 3,∧@`\α↓A9α¬bβ
dεα`$(≤.)  ⊂Pβ1 ∩Q"B@d
K@⊂∞Pε dαq↓AdεR`$k@⊂P∞ `8@`@9β↓ ∩
∞↔
P⊂λ(XP	↓⊂¬`λπ¬H→Wλ_⊂∞ 6,∧@d≤α↓Ur ↔λ_⊂∞ 0(∧@~∀@P	J∞↔
P⊂λ(\P	↓Qp∧βBr
+DεIH
E⊂→W 0. `8@`@9β↓1↓Dp¬$π	J(¬∧	k@⊂
↔⊂88@j\@HP	↓Yp∧@PL@⊂↔⊂18@f@9β↓ ∩β¬`
∧πλπ∀P
⊂λ'∞h\@↓λεα`$
+@⊂↔⊂⊗. 3 ≤@@X	↓Ap∧β
H_↔λ_⊂∞) 8.)((7& 
λ∧hL@@`\@*q↓I9β1 ∩β¬`λε4β⊂18@`@9β↓ ∩β¬`
∧πλπ∀P
⊂λ'∞h\@↓λεαbβ¬`λε%H
Wλ→P∞ 0,∧@`\α↓A9hQA9α¬bJβ¬`
∧∧∧⊂λnαq↓U9β⊃ ∩β¬`λε↓↔⊂⊂. 3 ≤@@P	↓Pp∧βαrDελπ∀P∞↔∀@∀
≠P∞ 5,∧@d↓p∧βJH≠↔λ¬∀f8@`@9β! ∩β⊃`λε¬H_↔λ_⊂∞) 8.) ((7 ≤@TX	↓H¬`λπ∀β⊂6. 4 ≤@@P	↓Dp∧β~∩Dελπ⊂_α! pαq%↓¬
e⊂εE~Jα 3.p\@2q↓Qdε"@d@⊂↔⊂⊂. 0 ≤@@X	J∞↔
P⊂λ(X	 2βU`λε4β⊂88@lL@PP	↓Ap∧β
↓H_↔λ_⊂∞ 2(∧@~∀@X	J∞↔
P⊂λ(X	 2βU`λε4β⊂9. 6& 4(∧@D≤α↓A9ε¬bβαβH¬@⊂_↔(∧@p@9J↓!Bq`λεTβ⊂3. 9. 6(∧@H≤α (∪¬`λε∀π⊂0. 2& 0(∧@`\αA↓ae∀αB↓λG 5 @↓~q↓e9β1 ∩β¬`λε%H~. 1. 0(∧@`\α↓A9$βA ∩↓(
∀
β @~(j@9πDεIH
¬↓⊂≠↔ 3 @↓αq↓Adεα@$@⊂Pε)8(@%↓@¬β4β⊂5. 8 ≤@HP	↓Qp∧βeH_↔λ_⊂∞ 0(∧@f\α↓A9hQA9$βA 2↓(
∀β ≤@↓*q↓adε"@d@⊂Pε l8@h@9β↓ ∩β¬`λε¬H_↔
P≤↔(   ⊂↓8q↓U9βA0∩β!`λε¬H≠↔λ¬∀f8@b\@PP	↓Ap∧βαrE∀∞@∀H⊂⊂λn8@j\@@`\@⊂¬bβ"βH
EDk@⊂↔⊂0. 1. 0(∧@`\αA↓ae∀αB↓	c@⊂α¬α5.b`@9β⊃ ∩βA`λε↔⊂⊂. 3 ≤@DX	↓Ap∧βαr∧E∀∞@∀H⊂⊂7. 5. 00. $αq↓Y9β→0∩β¬`λεEHλ@. 0 ≤@4⊂	Adεα`%(.)  ⊂Pβ1 ∩β∃`λε4β⊂5. 2& 4,∧@l\`\@8@`L@DX@`\αA↓ae∀αBβu`λπ∃β⊂3. 5. 2, 
0, 6.h\@λ¬bβαβH¬@⊂_↔) 8 ≤RP@N\α↓e2kDεKHED@⊂
Pε bαq↓Q→β↓0∩β¬`λε¬J ∞¬⊂P∀(5* 
9* &8@p@9β⊃ ∩βA`λεEH ↔λ_∪⊂_⊂_↔ 0.) 8,∧@%↓@¬β 4HWλ~⊂∞ 2(∧@j\α↓M)εebβαβH¬d@⊂P∞ 
0.) 8(∧B@P `
2∞+Dε	HE⊂~W 0. ,8@b\@LX@`\α↓A9α¬bJβ¬`
$∧∧⊂λnαq↓e9β!0∩β%`λπ¬H	KDαA→Wλ_W⊂_α 0.`\@8R@p\αI↓↓
kDε,@⊂Pε *8@d\@PP	↓Yp∧βαr¬bβ
dεα@$@∀λ≤⊂∞) ( '∞⊂∀	Eαq↓M→β1 ∩β!`λεTβ⊂0. 1. 4(@`\α↓A9α¬bJβ¬`
$∧λ∧7. 10.h\@↓⊂¬bβ*dε2`$
K@⊂↔⊂⊂↔λ_W⊂εBα0 ≤@@X	¬πE∀λ∧∀7(∧@b`8@hL@HP	↓ap∧β*H→Wλ_W⊂_α 0.`\@8R@p\αI↓↓∞βDεhπ⊂~K⊂≠@.d\@~(h\@8@`@9β↓0∩β¬`λε∀β⊂0.) 8.$@@@ π¬bβ~βH
%@⊂≠@.d\@αq↓Y9β! ∩β⊃`λε¬H_↔λ_⊂∞) 8.)((8 ≤@4⊂	Q→β⊃ ∩αq`λε4H≠↔λ_⊂∞ 5,∧@b↓p∧βαr∧Dελπ∀P∞↔∀@∀
≤⊂∞ 4(∧@n≤α↓M	εebβ∩dεR`$@⊂↔⊂⊂. 0 ≤@4⊂	E9J↓a9$αA!adεB@$
k@⊂Q⊂6. 2. 0, 5.`\@αq↓E9β↓0∩Jε↔
P⊂λ(`P→↓Pp∧βJH→Wλ≠∪⊂→α 
⊂, 5.b@9α¬bβαβH¬@∀P_8R@@!@πα@d
+@⊂↔⊂∪↔λ→S⊂≠K⊂~↔ 0.  8@`@9β	0∩β¬`
∧πλπ∀P
⊂≤↔ λ
∀j\α↓I9↓2q↓Mdεr`$@⊂
↔⊂⊂. 1. 0,∧@`\αA↓ae∀αB↓∞@⊂
Pε dαq↓e9β→0∩βe`λεEHλ↔λ_W⊂_α 0.⊂∀	Ap¬αβBe∀αBβ¬`λεUH	Wλ≤W⊂≠K⊂→π 4.  . 1. 0, 0.`\R`P	J¬
π¬H↓KDεhπ⊂≤K⊂→π 5 @~(`\@↓ ¬bβ
dεα`$@⊂↔∀@≤
α ∩@PαAa9εebβ"βHE⊂≠@.j@→ε5bβαβH¬@⊂_↔ 0. bαq%↓ap¬αααα≤. 
)2q↓Qdε"@$
c@⊂
Pε `8@`@9β↓0∩β5`λε¬HE∀∞@∀H⊂⊂λpαq↓Y→β! ∩β!`λεPε  8@f@9β) ∩β¬`λε∀π⊂0. 
)αq%↓ap¬αJHβ"J¬¬λK@⊂
Pε nαq↓e9β→0∩βe`λεEHλλ@. 0 ≤@@P	↓Ap∧βαr⊂πα@$∧P∀(2. ¬. 7 ≤@dX	↓P¬`λε↔⊂18@f@9h ∪αβH¬⊂_↔ 0.) 8(∧@%↓@¬β∩r¬+Dπ	H
¬⊂≠G 3 @↓2q↓Adεα@$@⊂↔⊂⊂.) 8.$@@!@↔λ≠∪⊂≤Kα 
↔(@h≤α↓E2∧kDε+H¬D@⊂↔⊂⊂.) 8. @@!@↔λ≠P∞ 3,∧@l\α↓a9αUbβ
dεB@$@⊂↔⊂↔λ_⊂∞) 	∀`!p¬αααα→. 7 ≤@TX	↓Mp∧βBrebβ"βH¬⊂_@.`\@αq↓Ae∀βBr⊂¬αC∩dεb`$
+@⊂∞↔⊂18@h@9β1 ∩β5`λ↓↓A_↔ 0. `8@`@9J↓a9$αA!I9βI0∩βe`λε4β⊂78@h@9β	 ∩βU`λε¬H_↔λ_⊂∞ 0,∧B@↓@¬bJαα
→
ε 9∞h	9hQQ9αpDε+He@⊂~W 0. `8@`@9β↓ ∩J∞↔
P⊂λ(LX	↓Up∧β4H≤Wλ~⊂∞ 6, 1∞`\@↓⊂¬bβαβH¬⊂_↔( 
)@q%↓¬e@⊂≠↔ 8. bαq↓Qdεr@$
+@⊂↔⊂⊂. 0 ≤@@P	↓Ap¬αβBβJ(¬∧∧→W 0∧\@↓@¬bβ
dεRbβq`λε%H~. ~)αq↓Adεα@$@∀λ≤∪∀P
⊂λ3.`	9β∃bβ∩dεR@$
`↔ 4. bαq↓Adεα@$@⊂↔∀@≤
α ∩@PαAM	εebβJd↓P@&+H∞¬⊂⊂G 4. dαq↓Adεα@$@⊂↔∀@≤
α ∩@PαAM2
KDπ+H
E⊂_@.h\@↓⊂¬bβ*dεα@$@⊂↔⊂0.) 
_(∧@%↓@¬β~H≠↔λ_X↔ 0∞@9ε@Dε+H
%@⊂→.`\@↓αq↓Adεα`$∧P88R@@!@ε2`$	c@⊂↔⊂88@l@9β! 2α⊃`λ↓↓@
5.`\@↓αq↓Adεα@$(≤.)  ⊂Pβ→0∩αp@⊂
↔⊂88@j\@HP	↓Yp∧βαrDε+H¬⊂_↔(∧@p@9J↓!B5`λε↓P∞ 
10 ≤@PP→↓Yp∧β
↓H~Wλ→∪⊂_
ε  .`\@↓αq%↓ap¬αα↓λ∧3. 8 ≤@PP→↓≤p∧β
↓H≠↔λ→⊂∞ 5(∧@`\α↓A9ε¬b↓ ¬_↔
P≤↔(  ⊂@ ε5bβBβH
E↓⊂∩.b@9εpDε+H¬↓⊂→.`\@↓αq↓Aa∀βBr⊂λ
¬εhπ⊂≤
ε &.h\@↓⊂¬bβ:βHβ!~W⊂_
α 0.b@9ε¬bβαβJ(π¬J ⊂∀
→P∞ 8(@l\α↓e2@↔λ~W⊂_α $\α↓A9ε¬bβαβH¬⊂P88R@@!@ε2`$β"F%⊂∩π 8. j8@d@9β1 ∩β⊂@⊂↔⊂0. 0 ≤@@P	¬πE∀λ∧∀3(∧@r↓p¬@∩r@↔λ~W⊂≠
α !\α↓Q9ε¬bβαβH¬⊂εEλ
α ∩@↓@¬bJαα
→Kα 9∞`	9ε@Dε+H
E⊂~W 2. `8@`@9β↓ 2β¬`
H≤⊂∞) ( ⊂F\α↓er
KDελπ⊂→
ε 7∞⊂∀SU`λε¬H_@. 0 ≤@@P	↓Ap¬αβBβJ(¬∧∧⊃W 9 ≤@↓8¬bβ∩dεB@$
K@⊂P∞ j8@`@9β↓ ∩β¬`λε¬J ∞¬⊂	 ( f@9hQe2
`↔λ~W⊂→α 6.b@9ε¬bβ"dεαbβ¬`λε¬J ∞¬⊂	 ( f@→ε⊂¬⊂~π 0ε@→αUbβ∩dεb`$ ↔ 0. `8@∀&¬bβαβJ(π¬J(
¬ε	H
E⊂→W 9 ≤@↓8¬bβ*dε"Bβ¬`λε∀π⊂0. 0 ≤@@X	¬βE∀λ∧∀4(@l\α↓a9α Dε+Hβ!εkH¬⊂_G 3" `8@`@9β↓ ∩Jε↔
P⊂λ(PP→↓Yp∧βBr@↔λ≠P∞ 1(∧@f\α↓U2Dελπ⊂_
α 0. @p@9J↓!↓Pp∧@PMK@⊂∞↔⊂↓Wλ_W⊂≠Kα 5.d\@αq↓Adεαbβ¬`
∧π	J(¬∧	β@⊂α. pαq↓MdεR`$
c@⊂↔⊂↔λ_⊂∞ 0, 1∞∩∧`\αI↓a→J↓!↓Qp∧β %H. 3 ≤@TX@n≤α↓A9α⊂Dε	HED@ε¬J(∞¬⊂P∀∧
↔⊂≠↔λ≤∪⊂→K⊂≠G 0. 
2. ¬. 1. 0, 0.0.) 8,∧@%↓@AQ9↓2q↓adεR`$
c@⊂Pε β. 0& 0( 0.d\@`8R@p\αI↓↓εEb↓ MKDπλπ⊂~K⊂≠G 1 ≤@↓αq↓I9β↓1↓Mp∧βαr∧E∀∞@∀H⊂⊂λh8@lL@dX	↓Mp∧β*H≠@. 2. 0(∧@`\α↓ErDα@
0.) 8. @@@ ε@DεIHL↔⊂28@n@9β)0∩β5`λε∀π⊂0. 0 ≤@@X@`\αA↓ae∀αB↓	β@⊂α. bβ↓ ∩βU`λεP∞ bαqhαLkDελπ⊂→
α 0.`\@αq%↓ap¬αα↓λ∧4∞ 7& 3,∧@p\α↓@2r@↔λ_⊂∞ 5,∧@b↓p∧βαrDελπ∀P∞↔∀P∀
~∪⊂εB≠P∞ 5,∧@p\α↓I9↓αq↓Y→β→0∩β⊃`λε¬HDελπ∀P∞↔∀P∀
~∪⊂≠⊂~W 8. ε. 1. 3, 0.`\@8@dL@4⊂`@9J↓a9%αA!Q→β91↓Up∧βBr∧ebβ
dεαbβ!`λε¬HkDε	H¬@∀P∧.)  ⊂Pβ! ∩βu`λπ∃β⊂28@l\@DX@~∀L\@j\`\@8@`L@@X	%↓@¬bJαα
¬¬D
k@⊂∞U⊂∪. 6. 2. 0.jT@α8@`L@@X@`\αI↓a9J↓!↓Qp∧hSu`λπ∃H↓KDεKH
%d+@⊂↔⊂⊂↔λ→W⊂_⊂_↔∧H≤↔∀P
∀~↔ 5* 	. 6. 3. 1.0. 5. 2. 0. 0.	
0.	 8.) ((4.jT@α@\@f\h\@dαq↓U9β↓9↓Ep↓A9↓αq↓A9J↓a9%αA!Q9βA9↓Mp↓U9↓:q↓E9h)Y9β↓9↓Ip↓A9↓αq↓A9J↓a9%αA!Q9βA9↓Mr↓U):q↓I9β19↓Ar↓A9↓
q↓A→β↓1%↓@q%↓↓C!14SA1↓Mp↓e)↓2q↓I9β)9↓Ep↓A9↓αq↓A9β↓9%@q%↓↓A! ∩β¬`βαdε2bβedβ∩rεUbβ
dεαbβ¬`hS¬dβαr∀παb
¬¬β"rπ↓bβ¬`β*R∧CDεKH%dkHε¬HDεH¬e(
βE∀λ∧∀~α 9.f\@j8@nL@4⊂	E9β11↓Ip↓A9↓αq↓A9β↓9%↓@q%↓¬αB@$∞+@⊂W⊂αWλ≠S⊂→α 6.0. ↓8@`L@@\@`\αI↓a9J↓!↓Qp∧hSα+@⊂U⊂⊗. 2. 7, 5.1(@8@`\@@X@`\αI↓a→J↓!↓Qp∧βJRUbβBdε∩bβ5`λεEH@↔λ_∪⊂_⊂_↔ 	
0.	 8&) ( 4.rP→αUbβBdε"`$
k@⊂W⊂1∞ 0 ≤@@X@`\α↓A9%βA1J¬↓β"r¬∃bβ:dε2bβ∃`λεEHβ"F%H
+Dε	H¬d@⊂↔∀P≤α! ((4. 9. 7. 5, 2.h	9↓λ¬bβαβH¬Dk@ε¬HλE∀∞@∀H∀⊂4. 
∀r8@nL@T\@f\b@→2q↓A→β↓1↓Ip∧βαr∧¬bJβ¬`
$∧λ~↔λ_X↔ 4ε@→*q↓M→β	1↓Yp↓A9⊂¬bβαd↓PCαβH¬@∀P∧.)  ⊂Pβ! 2β 1. 0, 0.d\@~(`\@αq%↓ap¬∩ααα~Wλ≠P∞ 00. hαq↓Y→β	0∩β5`λε¬H_↔λ→↔⊂_
α 0. @p@9J↓!BU`λε↓Pε bβ↓0∩βe`λε5Hβ"F∀π⊂48@`@9β↓1↓Hp∧βαrE∀∞@∀H⊂⊂λj8@n@9β∪αr¬KDεhπ⊂_α 0.h\@⊂¬bβαβH¬@⊂_↔( 8 ≤RP@!∃p∧H↓L∧↔ 2. nαq↓Mdεb@$@⊂P∞ hαq↓Adεα@$@∀λ≤⊂∞) ( ⊂J\α↓a9ε Dπ+He@⊂≠↔ 4. "αq↓AdεαBβ¬`λ↓↓A_↔( 8 ≤RP@!∃p∧βBr∧@↔λ≤W⊂≠α 3.b@9ε@Dελπ⊂_
α 0.`\R@`P	J¬
εUβ⊂88@h@9β90∩β5`λε↔⊂εE↔⊂0. 0 ≤@@X	↓Ap∧β
J(∞¬@⊂	 ( j@→πDελπ⊂≠Kα 3.0∧\@@8@b\@@P	↓Ap∧β∩r¬bJβ¬`
$∧λ∧5. ~∧p8@hL@XX	↓Mp∧βαr
KDε+H¬⊂⊃π 0. `8R@p\αA↓↓
+Dπλπ⊂~
α 7.`\@↓⊂¬bβ2dε∩`$k@⊂↔⊂0. 
)αq%↓ap¬∩ααα~Wλ≤⊂∞ 4(∧@r\α↓M2
KDεIH¬⊂_↔ 1 @↓αq↓Ae∀βBr∀¬αC*dπα@$	β@⊂∞P∞ nαq↓Md↓P@&+H¬⊂→.`\@↓αq↓Ae∀βBr⊂¬αC*dπα@$
K@⊂P∞ nαq↓IdεB@d@⊂↔⊂0. 0 ≤@@P	J∞↔
P⊂λ(TX	4Pπα@d
K@⊂P∞ nαq↓I→β↓ ∩α¬`λεEH_@. 0 ≤@@P→J∞↔
P⊂λ(TX	↓ap∧βeH→Wλ_⊂∞ 6∧P	↓↓⊃`λεEH→. 0 ≤@@P	4Q↓ ∩↓(≤.)  ⊂Pβ)0∩β¬`λε↓↔⊂48@d@9β0∩@$@⊂Pε `8@`@9β↓ ∩α¬`
H≤⊂∞) ( ⊂@Up∧βBr
KDελπ⊂→
ε '∞⊂∀S¬`λε¬H→Wλ_W⊂_
α 0. @p@9H↓!BU`λπ¬H↔λ≤W⊂→Jα !\α↓Q9α¬bβαβHE⊂_↔ 0.)8(@%↓@¬β*Hβ"G¬H≠↔λ≤W⊂→Kα 1\α↓A9ε@DεIH¬⊂_↔ 0.)8(∧@%↓@¬β*↓H≤. 10.f@9εpDεHπ⊂~
α !∞`\@↓αqhαLDελπ∀P∞↔∀@∀
~W⊂≤Jα 2\α↓@2r∞↔λ→P∞ 0,∧@h≤α↓A9ε¬bβαβH¬⊂P88R@@!@εR@$∞#@⊂
↔⊂6. 8 ≤@4⊂	I→β↓ ∩β⊂@⊂Pε `8@`@9β↓ ∩
∞↔
P⊂λ(TX	↓dp∧β"r
KDπλπ⊂→Jε !\α↓A9ε¬bβ∩βH¬⊂⊂↔(∧@p@9J↓!B¬+@⊂α¬∀@d¬`λε↓↔⊂3. 7 ≤@PP→↓∧¬`λε¬H_↔λ_⊂∞ 2(∧@`\α@∩βBβJ ¬∧∧⊂∃.r@9εebβ"βHE↓⊂∪@.f@9ε¬bβαβH¬↓⊂⊂@.⊂∀S¬`
H≤⊂∞	( ⊂@Up∧βJ↓H≠↔λ~⊂∞ 6∧P	↓∧¬`λε4π⊂0. 0 ≤@@P→↓λ¬`λε¬J ⊂≤
ε ∩@PαAU2∞+DεIH
¬↓⊂∪@.b@9hQA9ε Dελπ⊂→Jα 0.0.!@`P→J¬
εTπ⊂1@P	↓λ¬`eH→Wλ≠P∞ 4(@B↓p¬A9ε¬bβαβH¬↓⊂@88R@@!@εR@$β"DL↔⊂48@lL@`P→↓
p∧β
↓H_↔λ→⊂∞ 0(@@\α↓A9$∧πα@d∧P∀(5 ≤@↓λεα@d
K@⊂
↔⊂28@n@9β→ ∩β¬`λε¬H_@. ~)αq↓Ae∀βBr⊂λ
¬ε+HL↔⊂6. 4 ≤@HP→↓\¬`λε¬H→Wλ_W⊂_
ε  .`\R↓βA 2↓(
∀
Pε bβ↓ 2βe`λπ∀π⊂28@4&@Dε+He⊂_↔ 0. `8@`@9J↓a9$αA!U9β∪αr
KDπ+He⊂⊂@.h\@↓⊂¬bβαβH¬⊂_↔ 0.)8(∧@%↓@¬β*@Hβ"F⊗λπ⊂≤
ε $∞d\@↓8¬bβ~βH¬@⊂_↔ 0. `8@`@9J↓a9$αA!U9β↓Er
↔λ≠S⊂→Kα 6.d\@8@b\@@P	4S↓ ∩α¬`
H≤⊂∞) ( ⊂J\α↓EE9β10∩β5`λε↓P∞ dαq↓Qdεα`$ ↔ 0. `8@`@9J↓a9$αA!U9β∪
↓H≠↔λ→P∞ 7,∧@~∀PP→↓∧p∧βαr@↔λ_⊂∞ 0(∧@`\αA↓ae∀αB↓	+@⊂XW⊂≠⊂~.`≥r ↔λ→P∞ 0(∧@d↓p∧βαrDελπ∀P∞↔∀@∀
≠∪⊂εBα2& 5(∧@p\α↓Q9εpDεhπ⊂_
α 0.b@9ε¬bβαβJ(π¬H 
¬εIHE↓⊂~W 8. hαq↓]dεα@dk@⊂P∞ `8@`@9h ∪αβJ(π¬J 
¬εHπ⊂→
ε 9∞5 ≤@↓@¬bβ"βH¬↓⊂→W 0. `8@`@9β↓ ∩↓(≤.)  ⊂Pβ1 ∩α∧@↔ 10 ≤@TX	↓≤¬`λεEHβ"F∀π⊂3. 0 ≤@@P	↓Ap∧βαr⊂λ∞¬↓⊂	 ( `	9ε5bβ:βHE↓⊂≤↔ 5 ≤@↓λ¬bβ"βH¬↓⊂⊂↔,↔⊂0.) 8. 	↓Bα
KDε@
3. 7 ≤@PP→↓ap∧β*↓H→. 0 ≤@@P→↓↓p∧β
↓H_↔
P≤↔(  ⊂@!2q↓Mdε`%⊂∩.p\@↓*q↓Adεα@$λ@⊂↔⊂0. ~)αq%↓ap¬$∧∧⊂λ6. 3 ≤@dX	↓⊂¬`λπ¬H~Wλ→⊂∞ 0(∧@B↓p¬A9ε¬bβαβJ π¬H ⊂∀
≠∪⊂→Jε 9\α`≥r
↔λ→⊂∞ 
λ∧`@9β) ∩α⊂@⊂↔⊂0. 0 ≤Rp\B↓αA!Y→β→ ∩β⊂@⊂π ≤@↓*q↓Idεα@dλλ@.h\@↓αq↓Adεα@d∧P88R@@!@εb@dβ"@→Jε 10. 4 ≤@X	 ∩αU`λε%H_↔λ_W⊂_
α  .0.!@`P→J¬
ε↔⊂3. 10.0∞@9ε@DεHπ⊂~Jα  .1 ≤@↓αqhαLDελπ∀P∞↔⊂@ ((6& 3(∧@B`8@p@9β) 2α @⊂
↔⊂18@`@9β↓ 2α¬`λε¬J ⊂≤
ε ∩@PαA@∩r
↔λ→∪⊂≤
ε %.⊂∀Sq`λε∀π⊂3. 0 ≤@@P	↓Ap∧βαr⊂πα@d∧P∀(4∧\@↓ ¬bβ:βH
%@⊂≤↔ 2. `8@f@9β↓ 2β¬`λε∀π⊂0.) 8. @@@ εeb↓ ¬~πλ≠P∞ 5,∧@p\α↓I9ε¬bβαβHe@⊂⊂@.`\@↓αq%↓ap¬αααα≠↔λ~⊂∞ 6(∧@j\α↓a9α¬bβ
dε2`$@⊂↔⊂0. ~)αq%↓ap¬αα↓λ∧6. 4 ≤@dX	↓Up∧βBr@↔λ_⊂∞ 3(∧@b↓p¬A9ε¬bβαβJ(π¬J 
¬εIH
¬↓⊂≤G,π ≤@↓~q↓Ad↓P@&IH
%@⊂_@.0. `8@`@9J↓a9$αA!YdεB@d∞ ↔,π ≤@↓*q↓Mdε%⊂_↔,↔⊂0. 2 ≤@@P	J∞↔
P⊂λ(XP→4Q! 2β⊗¬bβ:βH
%@⊂⊃.`\@↓λ¬bβ~βH¬↓⊂⊂↔ 0. ∩`P→J¬
ε@↔⊂48@b`\α↓@:↓H~Wλ→P∞ 0∧P	↓↓p¬A9ε Dε@
0. 0 ≤Rp\R↓αA!Y→β! 2β⊗¬bβBβHe⊂~W 2. `8@b\@@P→↓↓p∧βαr⊂πα@d∧P∀(0∧\@↓ ¬bβ¬`λπ¬H~Wλ
∀f8@b\@@P	↓H¬`λε¬H_↔λ_⊂∞) 8.!((6. 8(@f\α↓Ur
`↔λ→∪⊂~
ε 0.`\@↓αq↓Adεα@$∧P88R@@!@εb`$β"F¬↓⊂→W 5 @↓8¬bβ∩dεα`$@⊂
↔⊂18@`@9β↓ ∩
ε↔
P⊂λ(XX	↓ap∧β~H≠@. 4 ≤@HP→↓Up∧βαrDελπ⊂_α 
0(∧B@↓@¬bJαα
≠⊂≤↔ 3 @↓8¬bβ"dε"@$@⊂
Pε `8@`@9β↓ ∩β¬`
∧πλπ∀P
⊂λ6.p\@~q↓]dεB@$@⊂α¬α1.j@→ε¬bβ∩dεα@$@∀λ≤⊂∞) ( ⊂L\α↓a9α5bβ:βH¬⊂→.j@→ε⊂Dελπ⊂_
α 0.`\R@`P	J¬
εeHβ"G¬H~Wλ→∪⊂~
α 7.`\@↓~q↓Adεα@$ ↔ 0.) 8(∧@%↓@¬β"r∞↔λ~W⊂→
α 4.`
rDελπ⊂→Kα 1\α↓A9hQA9%βA 2↓(
∀
↔⊂88@j\@HP	↓Ap∧β4π⊂48@b\@LX	↓Ap∧βαrE∀∞@∀H⊂⊂λl8@r\@HP	↓⊃p∧βBr∧kDε@
5. 0 ≤@@X	↓Ap∧βαrE∀∞@∀λ⊂λ ⊂l8@r\@HP→↓Up∧βtπ⊂48@b\@@P	↓Ap∧β~↓H_↔λ_⊂∞) 8.!((6& 
λ∧r\@HP	↓ap∧β*↓H→Wλ_W⊂_
ε 4\α`\@↓αq↓Ae∀βBr⊂¬αC2βH∞%⊂→W 5 ≤@↓8¬bβ"βHJε  .`\@↓αq↓Id↓P@&λπ∀@∞↔⊂	@ Pl@9βI ∩α5`λεTπ⊂88@h@9β∩@d@⊗¬H→. 0 ≤@@P→J∞↔
P⊂λ(XP→↓d¬`~↓H≤. 4 ≤@HP→4Pεα@d	+@⊗∀π⊂0. 0 ≤@@P→J∞↔
P⊂λ(XP→↓d¬`*↓H→. 4 ≤@XP→↓
p¬A9ε¬bβαβHJα  . 	↓aa⊂αB↓λ↔ λ
)↓⊂@⊗Tπ⊂28@p@9β→ 2α¬`λεEH_@. 0 ≤@@P→↓↓p¬$πλπ∧@
⊂λ ,\α↓er
`↔λ→⊂∞ 8(@F\αb@9ε@Dελπ⊂_
ε  .⊂∀S¬`
H≤⊂∞)( ⊂L\α↓EAdε"@d	+@⊂∞↔⊂48@b\@LX	↓↓p∧βαrDελπ∀P∞↔∀@ ((6 ≤@@	A9ε Dεhπ⊂~Kα 3.⊂∀S⊂@⊗¬H~. 0 ≤@@P	↓Ap¬$πλπ∀@
⊂λ&.10 ≤@LP	↓Up∧βBr@↔λ~⊂∞ 0(@B↓p¬A9ε¬bβαβJ π¬H ⊂∀
≠⊂∞ 
λ∧b`\α↓Mr
+Dπλπ⊂~
ε !\α`\@↓⊂¬bβαβH¬↓⊂⊂↔(∧@p@8H↓!B¬K@⊗⊗λπ⊂→Jα '\αh\@↓⊂¬bβαβH
%↓⊂⊂@.0. 
0. `8R@p\α@∩α↓λ∧≠↔λ_X↔ 5 ≤@↓⊂¬bβ"βH
E↓⊂⊃W 0. `8@b\@@P→↓↓p¬$πλπ∀@
⊂λ ,\α↓EAdεR@$λ@↔ 4. 
0∞@9ε¬bβ~βH¬↓⊂⊂↔,↔⊂0.) 8. @@!εebβ⊂@⊗%H~Wλ≠P∞ 4(@B↓p∧β~H_↔λ_⊂∞ 0(∧@`\α@∩βBβJ ¬∧∧⊂⊗.⊂∀S⊗⊂DεHπ⊂≠
α 5.f@9ε⊂Dελπ⊂_
α 0.0. `8R@p\α@∩α↓λ∧≠↔λ_X@.3 ≤@↓*q↓]dε"@d	↔,↔⊂18@`@9h ∪αβH¬↓⊂	 pαq%↓¬
E↓⊂⊂X@. 3 ≤@TP	↓≤¬`λεEH_@. 0 ≤@HP→↓↓p¬A9ε¬bJβ¬`
H⊂λ ⊂l8@bb↓p¬Mr
`↔λ~⊂∞ 
λ∧d@9β) ∩β¬`
↓H_↔λ_⊂∞ 0(@%πE∀λ∧∀7(@D↓p¬Q9εebβBβHe↓⊂∩W 0. `8@b\@@P→↓↓p¬$πλπ∀@
⊂λ .↓p∧@P¬→π-↔⊂6. 8 ≤@TP	↓Ap∧β
↓H→Wλ_⊂∞ 0(@@\α@∩βBβB ¬∧∧⊂↔\αf@9εebβJdε"@d
+@⊂↔⊂48@b\@@P	↓Ap∧@P¬_↔(∧@p@9J↓!B¬c@⊂P∞ pαq↓IdεB@d
K@⊗¬H~Wλ_W⊂_
α 0.`\R`P→J¬
εP∞ f8@p@9β1 ∩α @⊂↔⊂εE
P∞ bαq↓Qdεα@$@⊂↔∀@≤
α ∩@PαA@~↓H~. 2& 5,∧@p\α↓@2rkDελπ⊂_
α 1\α↓A9α¬bJβ¬`
∧∧∧⊂λn8@4	 q↓I→β)0∩β¬`λε↓↔⊂⊂. 3 ≤@@X	↓Ap∧βαr∧E∀∞@∀H⊂⊂λnαq↓Qdε"@d∞+@⊂α. f8@j\@@X@b≤α↓A9αq(&¬bJβ¬`
$∧λ∧7. 4& 6, 8.d\@
8@f@9β↓0∩β¬`λε¬HDε+J(π¬J(
¬εiH
¬⊂≠↔ 8. α8@j\@4⊂	Adεαbβ⊃`λε5H_↔λ_⊂∞) 8.) ((7& 4, 6.r@→ε Dε+HeD@⊂↔⊂⊂. 1. 0,∧R@↓@¬bJαα
≠Jα 
4(∧@l\α↓e 2@↔λ_∪⊂~K⊂→W 1 @αq↓A→β↓0∩J↓E∀λ∧∀7,∧@h\α↓a9↓~q↓A→β19↓Hp∧β*@H_@. 0& 0. 
0,! λ8R@@!A90∩βE`λπ¬H	+DεKH
EDk@ε¬HλDε	H¬d+@∀λ≤↔∀P
⊂≠W 4. λ8@j\@HX@l\∩∧`\`\@ααq↓Mdεαbβ¬`
$π	J(¬∧
k@⊂
↔⊂⊂⊃@X@j\α↓I9↓2q↓M→β↓9↓Ap↓E 2¬bβαe∀βBr∀¬αC:d↓PC"dε∪αr∧Ubβ∩dεbbβ¬`λε5H ↔λ_∪⊂_⊂_↔) 8&) ( 7.h\@αβ↓9↓ap∧β∩r∧Ubβ~βH%D@ε¬Hβ"F¬HλE∀∞B$¬λ∧7. 5. 2, 8.`	9↓αq↓Mdε∩bβE`λε¬HλDε	J(π¬J(
¬εiH
%DC@⊂∞U⊂6. 	∀f8@`L@PX@b\α↓A9α¬bβαe∀βBr∀¬αC:dεRrβ%`λπ∃β⊂6. 4& 0, 1.f\@αq↓A→β↓1%@¬bJαα
¬e@⊂εE~K⊂→W 8. 6. 4& 2,∧@`\`\@`8@`\@DXR@⊂8R@@!C90∩βU`β~r((8. 
5. 2. 6. 3. 7. 0. 4. 0. 1. 0. 0.) 8.) ((8. 5. 2. 9. 3. 6.4. 0. 1. 0. 0. 
0.) 8.) ((8. 5. 3. 9. 7. 2.4. 0. 1. 0. 0. 0.) 8.) ((8. 6. 3. 9. 2.5. 
0. 4. 1. 0. 0. 0.) 8,) ((8. 6. 4. 2. 7.5. 3. 0. 0. 0. 0. 1.) 8.) ((8. 
6. 4. 2. 7.5. 0. 0. 1. 3. 0. 0.) 8.) ((λ. 6. 4. 2.7. 0. 3. 5. 0. 1. 0. 
0.) 8.)) 
(do ((l foo (cdr l))
     (l1 nil (ib (not ( = (cadar l) 8)) (cons (car l) l1) l1)))
    ((null l) l1))
;LoadingMLMAC 85
NIL 
(test 13 9)